SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE FUNCTION [dbo].[FN_COOPRC_CNTB_Q01]  
/*------------------------------------------------------*/  
/*---- Empresa	: OFISIS S.A			    ----*/  
/*---- Cliente	: OFISIS S.A			    ----*/  
/*---- Sistema	: Tesoreria         		    ----*/  
/*---- Modulo	: Empresa           		    ----*/  
/*---- Programa	: Devuelve Libro Contable  	    ----*/  
/*---- Desarrollado por	: Carlos MARQUEZ ESCOBAR    ----*/  
/*---- Fecha Creacion	: 09/11/2005     	    	    ----*/  
/*---- Base de Datos	: SQL     		    	    ----*/  
/*---- Version			: 2000     	    	    ----*/  
/*------------------------------------------------------*/  
/*---- Comentarios		: 		    	    ----*/  
/*---- Drop FUNCTION FN_COOPRC_CNTB_Q01		    ----*/  
/*---- Grant Execute on FN_COOPRC_CNTB_Q01 to public----*/  
/*----						    	    ----*/  
/*------------------------------------------------------*/  
/*----   					    
Declare @OSCO_OPRC_CNTB TD_VC_003
Select @OSCO_OPRC_CNTB = dbo.FN_COOPRC_CNTB_Q01('01', '001')  
Select @OSCO_OPRC_CNTB       ---*/  

/*------------------------------------------------------*/  

(  
@ISCO_EMPR  TD_VC_002,  
@ISCO_TIPO_OPER  TD_VC_003  
  
) RETURNS TD_VC_003
  
As
BEGIN  
 Declare   

 @OSCO_OPRC_CNTB TD_VC_003
  
 Set @OSCO_OPRC_CNTB = Null
  
 /**** Operacion ******/  
 Select @OSCO_OPRC_CNTB = IsNull( Max( IsNull( t2.CO_OPRC_CNTB, '')), '')
 From  TTTIPO_OPER T1,  TDTIPO_OPER T2
 Where	
		t1.CO_EMPR = @ISCO_EMPR And
		t1.CO_TIPO_OPER = @ISCO_TIPO_OPER And
		t1.CO_EMPR = t2.CO_EMPR And
		t1.CO_TIPO_OPER = t2.CO_TIPO_OPER

 RETURN (@OSCO_OPRC_CNTB)  

      
END  

/*------------------------ FIN ----------------------------*/

GO
